home *** CD-ROM | disk | FTP | other *** search
/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / keyboard / drawstrip / !DrawStrip / !Run next >
Encoding:
Text File  |  1989-08-05  |  384 b   |  13 lines
  1. | DrawStrip
  2. if "<System$Path>" = "" then Error 0 System resources cannot be found
  3. if "<Font$Prefix>" = "" then Error 0 Fonts cannot be found 
  4.  
  5. | Usethe next 2 lines if you want to set the fontsize
  6. | copy MemAlloc into !System.modules first
  7. |RMEnsure MemAlloc 0 System:modules.MemAlloc
  8. |Fontsize 128
  9.  
  10. WimpSlot -min 48K -max 48K
  11. IconSprites <Obey$Dir>.!Sprites
  12. Run <Obey$Dir>.!RunImage
  13.